home *** CD-ROM | disk | FTP | other *** search
/ Almathera Ten Pack 9: Photo Library / Almathera Ten on Ten - Disc 9: Photo Library.iso / newicons / install_newicons < prev    next >
Text File  |  1994-10-31  |  6KB  |  220 lines
  1. ; NewIcons Installer Script
  2. ; $Ver: 37.6 (05.10.94)
  3. ; Written by Philip A. Vedovatti
  4. ; for Program Author Nicola Salmoria,
  5. ; with many thanks for his fine programming work.
  6.  
  7. (set @default-dest "SYS:C")
  8.  
  9. (set #bad-kick
  10.    (cat "\n\nSorry! You must have Workbench 2.0 or"
  11.         "higher to to use this package."))
  12.  
  13. (set #hello-message
  14.    (cat "\n\nThank you for trying NewIcons, the revolutionary"
  15.         "\nnew Graphical User Interface system for the Amiga."
  16.         "\nPlease read the documentation to get the most out"
  17.         "\nof this package.  Nothing will be deleted from your"
  18.         "\nsystem with this installation program.  Your old WB"
  19.         "\nicons will still be there, even though it won't look"
  20.         "\nlike it on your screen.  If you don't understand any"
  21.         "\npart of the installation, click on the \"Help\" gadget"
  22.         "\nfound throughout the installation for more information."
  23.         "\n\nCLICK TO PROCEED"))
  24.  
  25. (set #install-which
  26.    (cat "\nWhich part(s) of the NewIcons System would"
  27.         "\nyou like to install onto your hard drive?\n"))
  28.  
  29. (set #install-icons
  30.    (cat "\n\nInstalling the NewIcon icon"
  31.         "\nimages to your Sys: partition. \nYour old"
  32.         " icons will NOT be removed."))
  33.  
  34. (set #install-icons-help
  35.    (cat "\n\nThe new icon images will be embedded in"
  36.         "\nthe tool types of your existing .info"
  37.         "\nfiles.  The tooltype lines will be"
  38.         "\ninvisible once NewIcons is running"
  39.         "\nso operation will be totally transparent"
  40.         "\nto the user."))
  41.  
  42. (set #install-newicons
  43.    (cat "\n\nCopying the NewIcons main files to C:"
  44.         "\nand newicon.library to Libs:"))
  45.  
  46. (set #install-newicons-help
  47.    (cat "\n\nThis section installs NewIcons, Injectbrush"
  48.         "\nand PatchOpenWB to your C: directory."
  49.         "\nAdditionally, the newicon.library will be"
  50.         "\ncopied to your Libs: drawer."))
  51.  
  52. (set #tools-dest
  53.    (cat "\nWhich drawer would you like the NewIcon"
  54.         "\nmanipulation utilities to be installed?\n"))
  55.  
  56. (set #startup-newicon
  57.    (cat "\n\nAdding a line to your S:User-Startup file"
  58.         "\nto launch NewIcons whenever the system"
  59.         "\nis booted up."))
  60.  
  61. (set #install-deficons
  62.    (cat "\n\nInstalling the DefIcons daemon to your"
  63.         "\nC: directory."))
  64.  
  65. (set #install-envarc
  66.    (cat "\nCopying the default icons and brainfile"
  67.         "\nto ENVARC: so DefIcons can use them.\n"))
  68.  
  69. (set #install-envarc-help
  70.    (cat "\n\nThis section install the icons that DefIcons"
  71.         "\nwill use to display icon images for files that"
  72.         "\ndon't have icons already attached to them."))
  73.  
  74. (set #startup-deficons
  75.    (cat "\n\nAdding a line to your S:user-Startup file"
  76.         "\nto launch DefIcons whenever the system"
  77.         "\nis booted up."))
  78.  
  79. (set #powb-message
  80.    (cat "\n\nIf you have installed NewIcons, you must "
  81.            "add a line to your S:Startup-Sequence:\n\n"
  82.            "C:PatchOpenWB\n"
  83.            "\nto fix a bug in the 3.x operating system!"
  84.            "\n\n Make sure to place the line after Setpatch"
  85.            "\nand before IPrefs."))
  86. (set #exit-message
  87.    (cat "Please reboot your system to fully activate\n"
  88.         "the NewIcons and/or Deficons Systems."
  89.         "\n\n\nHave fun using NewIcons!"))
  90.  
  91. ; ------------------------------
  92. ; Check Kickstart Version
  93. ; ------------------------------
  94.  
  95.  (if (< (getversion "LIBS:version.library") (* 37 65536))
  96.         (abort #bad-kick)
  97.  )
  98.  
  99. (message #hello-message)
  100.  
  101. ; ------------------------------
  102. ; What should I install?
  103. ; ------------------------------
  104.  
  105. (set InstallOpt
  106.       (askoptions (prompt #install-which)
  107.                   (help @askoptions-help)
  108.                   (choices "NewIcons" "DefIcons")
  109.       )
  110. )
  111.  
  112. ;-------------------------------------------------------
  113. ;Install icon images, NewIcons, and icon support files
  114. ;-------------------------------------------------------
  115.  
  116.  
  117. (if (BITAND InstallOpt 1)
  118.  
  119.   ((copylib
  120.       (source "libs/newicon.library")
  121.       (dest "libs:")
  122.    )
  123.  
  124.  
  125.    (message #install-icons)
  126.  
  127.    (execute "Install_Icons"
  128.       (help #install-icons-help)
  129.    )
  130.  
  131.    (copylib
  132.       (prompt #install-newicons)
  133.       (source "C/NewIcons")
  134.       (dest "c:")
  135.       (help #install-newicons-help)
  136.    )
  137.  
  138.    (copylib
  139.       (source "C/InjectBrush")
  140.       (dest "c:")
  141.    )
  142.  
  143.    (copylib
  144.       (source "C/PatchOpenWB")
  145.       (dest "c:")
  146.    )
  147.  
  148.    (copylib
  149.       (source "libs/newicon.library")
  150.       (dest "libs:")
  151.    )
  152.  
  153.    (set destdir
  154.       (askdir
  155.             (prompt #tools-dest)
  156.             (help @askdir-help)
  157.             (default "Sys:Utilities")
  158.       )
  159.    )
  160.  
  161.    (copyfiles
  162.       (source "Utilities/CopyNewIcon")
  163.       (dest destdir)
  164.       (infos)
  165.    )
  166.  
  167.    (copyfiles
  168.       (source "Utilities/CreateDefaultIcon")
  169.       (dest destdir)
  170.       (infos)
  171.    )
  172.  
  173.    (copyfiles
  174.       (source "Utilities/KillNewIcon")
  175.       (dest destdir)
  176.       (infos)
  177.    )
  178.  
  179.    (startup "NewIcons"
  180.       (prompt #startup-newicon)
  181.       (command "NewIcons")
  182.       (help @startup-help)
  183.    )
  184.   )
  185. )
  186.  
  187. ;------------------------------
  188. ;Install Deficons
  189. ;------------------------------
  190.  
  191. (if (BITAND InstallOpt 2)
  192.  
  193.   ((copylib
  194.       (prompt #install-deficons)
  195.       (source "C/DefIcons")
  196.       (dest "C:")
  197.    )
  198.  
  199.    (copyfiles 
  200.       (prompt #install-envarc)
  201.       (source "envarc")
  202.       (dest "ENVARC:")
  203.       (all)
  204.       (infos)
  205.       (help #install-envarc-help)
  206.    )
  207.  
  208.    (startup "DefIcons"
  209.       (prompt #startup-deficons)
  210.       (command "DefIcons")
  211.       (help @startup-help)
  212.    )
  213.   )
  214. )
  215.  
  216. (message #powb-message)
  217.  
  218. (exit #exit-message)
  219.  
  220.